home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 1
/
CU Amiga Magazine CD-ROM Special Edition (1995)(EMAP Images)(GB)[Issue 1995-11].iso
/
Aminet
/
comm
/
bbs
/
ta_brb.lha
/
BRB.TRANS
< prev
next >
Wrap
Text File
|
1995-06-04
|
539b
|
19 lines
/* $VER: TA-BRB script v.01 (6/4/95) for TransAmiga by John Kratz
Fidonet 1:2608/22.0, Internet jkratz@erc.cat.syr.edu
*/
options results
userinfo a ;username = result
userinfo x ; term=result
if TERM = 'OFF' then TERM = 0
if TERM = 'ON' then TERM = 1
if TERM ~= 1 then sendfile 'BBS:Text/BRB.txt'
else sendfile "BBS:Text/BRB.ansi"
Do Until Upper(KeyPress)~="RESULT"&Upper(KeyPress)~="NOCHAR"
Maygetchar
KeyPress=result
If KeyPress = "###PANIC" then Exit 10
End
cls
transmit 'Welcome back 'username
transmit ''
exit 10